inherited FrmRel_RazaoContas: TFrmRel_RazaoContas
  Left = 356
  Top = 143
  Caption = 'Raz'#227'o de Contas'
  ClientHeight = 513
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 104
    Height = 342
    object Label1: TLabel
      Left = 5
      Top = 269
      Width = 57
      Height = 14
      Caption = 'Data Inicial'
    end
    object Label2: TLabel
      Left = 5
      Top = 293
      Width = 51
      Height = 14
      Caption = 'Data Final'
    end
    object BtnInsereHistorico: TSpeedButton
      Left = 9
      Top = 47
      Width = 25
      Height = 20
      Hint = 'Insere um novo hist'#243'rico na lista.'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      Layout = blGlyphRight
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = BtnInsereHistoricoClick
    end
    object lblHistorico: TLabel
      Left = 40
      Top = 51
      Width = 56
      Height = 14
      Caption = 'Hist'#243'ricos'
      Font.Charset = ANSI_CHARSET
      Font.Color = clActiveCaption
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 348
      Top = 52
      Width = 140
      Height = 16
      Caption = 'R11 + USUARIO + .HIS'
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      Visible = False
    end
    object Label8: TLabel
      Left = 40
      Top = 155
      Width = 198
      Height = 14
      Caption = 'Empresa  /  C'#243'digo  /  Banco  /  Conta'
      Font.Charset = ANSI_CHARSET
      Font.Color = clActiveCaption
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object BtnInsereContas: TSpeedButton
      Left = 9
      Top = 153
      Width = 24
      Height = 18
      Hint = 'Insere um novo hist'#243'rico na lista.'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      Layout = blGlyphRight
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = BtnInsereContasClick
    end
    object ListaHistorico: TCheckListBox
      Left = 4
      Top = 68
      Width = 514
      Height = 81
      BevelKind = bkFlat
      BorderStyle = bsNone
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 1
      OnKeyDown = ListaHistoricoKeyDown
    end
    object edtDataInicial: TDateEdit
      Left = 69
      Top = 267
      Width = 121
      Height = 21
      NumGlyphs = 2
      TabOrder = 3
      OnKeyDown = edtDataInicialKeyDown
    end
    object edtDataFinal: TDateEdit
      Left = 69
      Top = 291
      Width = 121
      Height = 21
      NumGlyphs = 2
      TabOrder = 4
      OnKeyDown = edtDataFinalKeyDown
    end
    object rdgSaida: TRadioGroup
      Left = 276
      Top = 268
      Width = 237
      Height = 41
      Caption = 'Sa'#237'da'
      Columns = 2
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ItemIndex = 0
      Items.Strings = (
        'Impressora'
        'Tela')
      ParentFont = False
      TabOrder = 6
    end
    object ckAviso: TCheckBox
      Left = 5
      Top = 319
      Width = 185
      Height = 17
      Caption = 'Imprimir aviso de lan'#231'amento'
      TabOrder = 5
    end
    object ListaConta: TCheckListBox
      Left = 4
      Top = 173
      Width = 514
      Height = 89
      BevelKind = bkFlat
      BorderStyle = bsNone
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 10
    end
    object rdgFiltro: TRadioGroup
      Left = 10
      Top = 2
      Width = 223
      Height = 41
      Caption = 'Filtro de Hist'#243'rico'
      Columns = 2
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ItemIndex = 0
      Items.Strings = (
        'Lista'
        'Intervalo')
      ParentFont = False
      TabOrder = 0
      OnClick = rdgFiltroClick
    end
    object pnlIntervalo: TPanel
      Left = 48
      Top = 46
      Width = 522
      Height = 105
      BevelOuter = bvNone
      Color = 14936298
      TabOrder = 2
      Visible = False
      object btnHiddeout1: TSpeedButton
        Left = 0
        Top = 8
        Width = 185
        Height = 41
        Enabled = False
        Flat = True
      end
      object Label9: TLabel
        Left = 11
        Top = 25
        Width = 83
        Height = 14
        Alignment = taRightJustify
        Caption = 'Hist'#243'rico Inicial'
      end
      object btnHistIni: TSpeedButton
        Left = 184
        Top = 21
        Width = 23
        Height = 22
        Enabled = False
        Flat = True
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
          333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
          C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
          F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
          F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
          00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
          3333333373FF7333333333333000333333333333377733333333333333333333
          3333333333333333333333333333333333333333333333333333}
        NumGlyphs = 2
        OnClick = btnHistIniClick
      end
      object Label10: TLabel
        Left = 17
        Top = 65
        Width = 77
        Height = 14
        Alignment = taRightJustify
        Caption = 'Hist'#243'rico Final'
      end
      object btnHistFin: TSpeedButton
        Left = 184
        Top = 61
        Width = 23
        Height = 22
        Enabled = False
        Flat = True
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
          333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
          C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
          F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
          F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
          00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
          3333333373FF7333333333333000333333333333377733333333333333333333
          3333333333333333333333333333333333333333333333333333}
        NumGlyphs = 2
        OnClick = btnHistFinClick
      end
      object edtHistIni: TMaskEdit
        Left = 98
        Top = 21
        Width = 85
        Height = 22
        BevelKind = bkFlat
        BorderStyle = bsNone
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnEnter = edtHistIniEnter
        OnExit = edtHistIniExit
        OnKeyDown = edtHistIniKeyDown
      end
      object pnlHistIni: TPanel
        Left = 207
        Top = 21
        Width = 304
        Height = 22
        Alignment = taLeftJustify
        BevelInner = bvLowered
        Color = 14081504
        TabOrder = 2
      end
      object edtHistFin: TMaskEdit
        Left = 98
        Top = 61
        Width = 85
        Height = 22
        BevelKind = bkFlat
        BorderStyle = bsNone
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnEnter = edtHistFinEnter
        OnExit = edtHistFinExit
        OnKeyDown = edtHistFinKeyDown
      end
      object pnlHistFin: TPanel
        Left = 207
        Top = 61
        Width = 304
        Height = 22
        Alignment = taLeftJustify
        BevelInner = bvLowered
        Color = 14081504
        TabOrder = 3
      end
    end
    object pnlHist: TPanel
      Left = 519
      Top = 56
      Width = 449
      Height = 177
      BevelInner = bvLowered
      BorderWidth = 1
      Color = clGray
      TabOrder = 8
      Visible = False
      object btnHiddeout2: TSpeedButton
        Left = 24
        Top = 0
        Width = 265
        Height = 41
        Enabled = False
        Flat = True
      end
      object Label5: TLabel
        Left = 8
        Top = 12
        Width = 78
        Height = 19
        Caption = 'Hist'#243'ricos'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -16
        Font.Name = 'Arial'
        Font.Style = [fsBold, fsUnderline]
        ParentFont = False
      end
      object dbgrdHist: TDBGrid
        Left = 3
        Top = 40
        Width = 443
        Height = 134
        Align = alBottom
        DataSource = dtsrc
        Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Arial'
        TitleFont.Style = [fsBold]
        OnDblClick = dbgrdHistDblClick
        OnKeyDown = dbgrdHistKeyDown
        Columns = <
          item
            Expanded = False
            FieldName = 'Cod'
            Title.Caption = 'C'#243'digo'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Descr'
            Title.Caption = 'Descri'#231#227'o'
            Width = 333
            Visible = True
          end>
      end
      object grpBusca: TGroupBox
        Left = 8
        Top = 88
        Width = 433
        Height = 57
        Caption = ' Informe a Descri'#231#227'o '
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        Visible = False
        object Label6: TLabel
          Left = 200
          Top = 40
          Width = 229
          Height = 14
          Caption = ' Tecle <F5> p/ localizar por C'#243'd. ou Descr. '
          Font.Charset = ANSI_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object edNome: TEdit
          Left = 8
          Top = 16
          Width = 417
          Height = 22
          CharCase = ecUpperCase
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
          OnKeyDown = edNomeKeyDown
        end
      end
      object Panel5: TPanel
        Left = 227
        Top = 44
        Width = 185
        Height = 14
        Alignment = taRightJustify
        BevelOuter = bvNone
        Caption = '<F2> p/ localizar'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
      end
      object BitBtn1: TBitBtn
        Left = 364
        Top = 10
        Width = 75
        Height = 25
        Caption = '&Fechar'
        TabOrder = 3
        OnClick = BitBtn1Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777788
          F8F878F7777777777333333F00004444400777FFF444447777777777F333FF7F
          000033334D5008FFF4333377777777773337777F0000333345D50FFFF4333333
          337F777F3337F33F000033334D5D0FFFF43333333377877F3337F33F00003333
          45D50FEFE4333333337F787F3337F33F000033334D5D0FFFF43333333377877F
          3337F33F0000333345D50FEFE4333333337F787F3337F33F000033334D5D0FFF
          F43333333377877F3337F33F0000333345D50FEFE4333333337F787F3337F33F
          000033334D5D0EFEF43333333377877F3337F33F0000333345D50FEFE4333333
          337F787F3337F33F000033334D5D0EFEF43333333377877F3337F33F00003333
          4444444444333333337F7F7FFFF7F33F00003333333333333333333333777777
          7777333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
          333333333333777777F3333F00003333330000003333333333337FFFF7F3333F
          0000}
        NumGlyphs = 2
      end
      object btnInc: TBitBtn
        Left = 271
        Top = 10
        Width = 88
        Height = 25
        Caption = 'Inc. Todos'
        TabOrder = 4
        OnClick = btnIncClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333333333333FFF333333333333000333333333
          3333777FFF3FFFFF33330B000300000333337F777F777773F333000E00BFBFB0
          3333777F773333F7F333000E0BFBF0003333777F7F3337773F33000E0FBFBFBF
          0333777F7F3333FF7FFF000E0BFBF0000003777F7F3337777773000E0FBFBFBF
          BFB0777F7F33FFFFFFF7000E0BF000000003777F7FF777777773000000BFB033
          33337777773FF733333333333300033333333333337773333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          3333333333333333333333333333333333333333333333333333}
        NumGlyphs = 2
      end
    end
    object PnlGrid: TPanel
      Left = -480
      Top = 90
      Width = 497
      Height = 225
      Color = clGray
      TabOrder = 9
      Visible = False
      object Label7: TLabel
        Left = 4
        Top = 12
        Width = 420
        Height = 20
        Caption = 'Contas relacionadas com as empresas selecionadas'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clAqua
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object DbgContas: TDBGrid
        Left = 1
        Top = 32
        Width = 495
        Height = 192
        Hint = 'Duplo clique para enviar conta para a listagem.'
        Align = alBottom
        Color = clTeal
        DataSource = DsConta
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnDblClick = DbgContasDblClick
        OnKeyDown = DbgContasKeyDown
        Columns = <
          item
            Expanded = False
            FieldName = 'Emp_codigo'
            Title.Caption = 'Empresa'
            Width = 68
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ContaCod'
            Title.Caption = 'C'#243'digo'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ban_descricao'
            Title.Caption = 'Nome do Banco'
            Width = 200
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'conta_codigo'
            Title.Caption = 'Conta'
            Width = 180
            Visible = True
          end>
      end
      object BtnSair: TBitBtn
        Left = 456
        Top = 4
        Width = 36
        Height = 25
        Caption = 'Sair'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = BtnSairClick
      end
      object ckInativas: TCheckBox
        Left = 385
        Top = 34
        Width = 109
        Height = 16
        Caption = 'Mostrar Inativas'
        Checked = True
        Color = clBtnFace
        ParentColor = False
        State = cbChecked
        TabOrder = 2
        OnClick = ckInativasClick
      end
    end
    object ckOmitirLcto: TCheckBox
      Left = 278
      Top = 318
      Width = 147
      Height = 17
      Caption = 'Omitir lan'#231'amentos'
      TabOrder = 7
    end
  end
  inherited Panel2: TPanel
    Top = 446
    inherited bimprimir: TFlatButton
      Left = 8
      Enabled = True
      OnClick = bimprimirClick
    end
    inherited btncancelar: TFlatButton
      Left = 206
      OnClick = btncancelarClick
    end
    inherited btnfechar: TFlatButton
      Left = 404
    end
  end
  inherited sb: TStatusBar
    Top = 494
  end
  inherited Panel3: TPanel
    Height = 104
    inherited ListaEmp: TCheckListBox
      Height = 72
    end
  end
  inherited Timer1: TTimer
    Left = 436
    Top = 32
  end
  inherited RDP: TRDprint
    OnNewPage = RDPNewPage
    OnBeforeNewPage = RDPBeforeNewPage
    Left = 464
    Top = 32
  end
  object dtsrc: TDataSource
    DataSet = CDS
    Left = 352
    Top = 32
  end
  object CDS: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 380
    Top = 32
    object CDSCod: TStringField
      FieldName = 'Cod'
      Size = 10
    end
    object CDSDescr: TStringField
      FieldName = 'Descr'
      Size = 40
    end
  end
  object AVISO: TRxMemoryData
    FieldDefs = <>
    Left = 408
    Top = 32
    object AVISOMov_Codigo: TFloatField
      FieldName = 'Mov_Codigo'
    end
    object AVISOMov_Valor: TFloatField
      FieldName = 'Mov_Valor'
    end
    object AVISOMov_NUMCHEQUE: TStringField
      FieldName = 'Mov_NUMCHEQUE'
    end
    object AVISOData: TStringField
      FieldName = 'Data'
    end
    object AVISOMOV_HISTORICO: TStringField
      FieldName = 'MOV_HISTORICO'
      Size = 170
    end
    object AVISOCONTA_CODIGO: TStringField
      FieldName = 'CONTA_CODIGO'
      Size = 3
    end
  end
  object CdsConta: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 352
    Top = 63
    object CdsContaEmp_codigo: TStringField
      FieldName = 'Emp_codigo'
      Size = 3
    end
    object CdsContaContaCod: TStringField
      FieldName = 'ContaCod'
      Size = 3
    end
    object CdsContaban_descricao: TStringField
      FieldName = 'ban_descricao'
      Size = 40
    end
    object CdsContaconta_codigo: TStringField
      FieldName = 'conta_codigo'
      Size = 13
    end
    object CdsContaAtiva: TBooleanField
      FieldName = 'Ativa'
    end
  end
  object DsConta: TDataSource
    AutoEdit = False
    DataSet = CdsConta
    Left = 380
    Top = 64
  end
  object cdsDados: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 352
    Top = 128
    object cdsDadosMov_Codigo: TStringField
      FieldName = 'Mov_Codigo'
      Size = 6
    end
    object cdsDadosMov_Datamov: TDateField
      FieldName = 'Mov_Datamov'
    end
    object cdsDadosMov_Valor: TFloatField
      FieldName = 'Mov_Valor'
    end
    object cdsDadosBan_Codigo: TStringField
      FieldName = 'Ban_Codigo'
      Size = 4
    end
    object cdsDadosMov_NumCheque: TStringField
      FieldName = 'Mov_NumCheque'
    end
    object cdsDadosMov_Historico: TStringField
      FieldName = 'Mov_Historico'
      Size = 170
    end
    object cdsDadosConta_Codigo: TStringField
      FieldName = 'Conta_Codigo'
      Size = 4
    end
    object cdsDadosHist_Codigo: TStringField
      FieldName = 'Hist_Codigo'
    end
  end
  object cdsHistorico: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 296
    Top = 128
    object cdsHistoricoCodigo: TStringField
      FieldName = 'Codigo'
      Size = 30
    end
  end
end
